inherited frmCadConvenios: TfrmCadConvenios
  Caption = 'Cadastro de Conv'#234'nios'
  ClientHeight = 342
  ExplicitHeight = 369
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 8
    Top = 16
    Width = 33
    Height = 13
    Caption = 'C'#243'digo'
  end
  object Label2: TLabel [1]
    Left = 8
    Top = 64
    Width = 90
    Height = 13
    Caption = 'Nome do Conv'#234'nio'
    FocusControl = DBEdit2
  end
  object DBText1: TDBText [2]
    Left = 8
    Top = 32
    Width = 65
    Height = 17
    DataField = 'IDCONVENIO'
    DataSource = dsCad
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  inherited Panel1: TPanel
    Top = 301
    ExplicitTop = 301
  end
  object DBEdit2: TDBEdit [4]
    Left = 8
    Top = 83
    Width = 396
    Height = 21
    DataField = 'NOMECONVENIO'
    DataSource = dsCad
    TabOrder = 1
  end
  object dbgProcedimentos: TDBGrid [5]
    Left = 8
    Top = 160
    Width = 500
    Height = 120
    DataSource = dsCadProcedimentos
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Visible = False
    Columns = <
      item
        Expanded = False
        FieldName = 'IDCONVENIO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'IDPROCEDIMENTO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PROCEDIMENTO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TIPODESCONTO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'VALORDESCONTO'
        Visible = True
      end>
  end
  object btnprocedimentos: TBitBtn [6]
    Left = 8
    Top = 129
    Width = 156
    Height = 25
    Caption = 'Procedimentos Cobertos'
    TabOrder = 3
    OnClick = btnprocedimentosClick
    Glyph.Data = {
      46010000424D4601000000000000460000002800000010000000100000000100
      08000000000000010000120B0000120B0000040000000400000000000000C048
      0000FF00FF00FFFFFF0002020202020202020202020202020202010101020202
      0202010101020202020201030102000000020103010200000002010102020202
      0202010102020202020202020202020202020202020202020202020202020202
      0202020202020202020201010102020202020101010202020202010301020000
      0002010301020000000201010202020202020101020202020202020202020202
      0202020202020202020202020202020202020202020202020202010101020202
      0202010101020202020201030102000000020103010200000002010102020202
      0202010102020202020202020202020202020202020202020202020202020202
      02020202020202020202}
  end
  object btnAddProcedimento: TBitBtn [7]
    Left = 170
    Top = 129
    Width = 156
    Height = 25
    Caption = 'Adicionar Procedimento'
    TabOrder = 4
    OnClick = btnAddProcedimentoClick
    Glyph.Data = {
      52010000424D5201000000000000520000002800000010000000100000000100
      08000000000000010000120B0000120B00000700000007000000116A160023A1
      3800488F480050986A007BD47300FF00FF00FFFFFF0005050505050505050505
      0505050505050505050505050300000305050505050505050505050502040100
      0505050505050505050505050204010005050505050505050505050502040100
      0505050505050505050505050204010005050505050505030000000000040100
      0000000003050502010101010101010101010101000505020404040404040104
      0404040400050503020202020204010000000000030505050505050502040100
      0505050505050505050505050204010005050505050505050505050502040100
      0505050505050505050505050204010005050505050505050505050503020203
      05050505050505050505050505050505050505050505}
  end
  inherited dsCad: TDataSource
    DataSet = dmCad.cdsCadConvenios
    Left = 464
    Top = 16
  end
  object dsCadProcedimentos: TDataSource
    DataSet = dmCad.cdsCadConvenioProcedimentos
    Left = 464
    Top = 48
  end
end
